// TOWN SPECIAL ENCOUNTERS
//    Town 71: Lower Tower of Zkal

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

//	set_name(,);
//	add_range_to_group(,,groupn);

	sf(71,8,0);
	sf(71,23,0);
	sf(71,25,0);
	sf(71,27,0);
	set_crime_tolerance(max_crime);

	set_aggression(30001,50);
	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_town()) && (tick_difference(last_abil,get_current_tick()) > 0))) {
		last_abil = get_current_tick();
		
		counter = counter + 1;
		if (counter == 10) {
			counter = 0;
			restore_energy_char(30000,-1);
			}

		if (gf(71,23) > 0) {
			inc_flag(71,24,1);
			if (gf(71,24) > 12)
				sf(71,24,0);
			if (gf(71,24) < 5) {
				set_terrain(0, 41, 54, 309);
				set_terrain(0, 42, 54, 309);
				}
				else {
					set_terrain(0, 41, 54, 313);
					set_terrain(0, 42, 54, 313);
					}

			}
			
		if (gf(71,25) > 0) {
			inc_flag(71,26,1);
			if (gf(71,26) > 14)
				sf(71,26,0);
			if (gf(71,26) < 5) {
				set_terrain(0, 44, 43, 309);
				set_terrain(0, 45, 43, 309);
				set_terrain(0, 46, 43, 309);
				set_terrain(0, 47, 43, 309);
				set_terrain(0, 48, 43, 309);
				set_terrain(0, 49, 43, 309);
				}
				else {
					set_terrain(0, 44, 43, 313);
					set_terrain(0, 45, 43, 313);
					set_terrain(0, 46, 43, 313);
					set_terrain(0, 47, 43, 313);
					set_terrain(0, 48, 43, 313);
					set_terrain(0, 49, 43, 313);
					}
			}
			
		if (gf(71,27) > 0) {
			inc_flag(71,28,1);
			if (gf(71,28) > 14)
				sf(71,28,0);
			if (gf(71,28) < 5) {
				set_terrain(0, 51, 7, 309);
				set_terrain(0, 52, 7, 309);
				set_terrain(0, 55, 11, 309);
				set_terrain(0, 56, 10, 309);
				set_terrain(0, 57,10, 309);

				}
				else {
					set_terrain(0, 51, 7, 313);
					set_terrain(0, 52, 7, 313);
					set_terrain(0, 55, 11, 313);
					set_terrain(0, 56, 10, 313);
					set_terrain(0, 57,10, 313);
					}
			}

		}

break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

